home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
fish
/
726-750
/
746
/
kcommodity
/
kcxsource
/
source.lha
/
MyMacros.i
< prev
next >
Wrap
Text File
|
1992-09-08
|
722b
|
72 lines
CALLSYS MACRO
IFEQ NARG-1
move.l $4.W,a6
jsr _LVO\1(a6)
ELSE
FAIL
ENDC
ENDM
RELLIB MACRO
IFEQ NARG-2
move.l \2(a4),a6
jsr _LVO\1(a6)
ELSE
FAIL
ENDC
ENDM
LNKLIB MACRO
IFEQ NARG-2
move.l \2,a6
jsr _LVO\1(a6)
ELSE
FAIL
ENDC
ENDM
DOLIB MACRO
IFEQ NARG-1
jsr _LVO\1(a6)
ELSE
FAIL
ENDC
ENDM
BOLDON MACRO
dc.b $9B,"1",$6D
ENDM
ITALICON MACRO
dc.b $9B,"3",$6D
ENDM
UNDERLINEON MACRO
dc.b $9B,"4",$6D
ENDM
INVERTON MACRO
dc.b $9B,"7",$6D
ENDM
SETFRONTPEN MACRO
dc.b $9B,'3',('0'+\1),$6D
ENDM
SETBACKPEN MACRO
dc.b $9B,'4',('0'+\1),$6D
ENDM
STYLENORMAL MACRO
dc.b $9B,"0",$6D
ENDM
RegsAll REG d0-d7/a0-a6
MISC_MYMACROS_I SET 1